home *** CD-ROM | disk | FTP | other *** search
/ Kimeruze! Yamikon! / Kimeruze! Yamikon!.iso / mac / YARIKON / EVENT08.Dxr / 00080.ls < prev    next >
Encoding:
Text File  |  1996-10-23  |  338 b   |  20 lines
  1. on exitFrame
  2.   global hand, nugis, self, syu
  3.   if hand = 1 then
  4.     set nugis to nugis - 1
  5.     if syu < 5 then
  6.       play frame "smov"
  7.     else
  8.       play frame "slmov"
  9.     end if
  10.   end if
  11.   if hand = 2 then
  12.     set the visible of sprite 26 to 1
  13.     go("syu")
  14.   end if
  15.   if hand = 3 then
  16.     set self to self - 1
  17.   end if
  18.   go("syu")
  19. end
  20.